﻿using System;
using System.Collections.Generic;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Data;
using Common;
using Taobao.Top.Api;
using Taobao.Top.Api.Request;
using Taobao.Top.Api.Domain;
using System.Net;
using System.Text;
using System.IO;
using System.Security.Cryptography;
using System.Text.RegularExpressions;
using System.Xml;

public partial class top_crm_groupadd : System.Web.UI.Page
{
    public string session = string.Empty;
    public string nick = string.Empty;
    public string id = string.Empty;
    public string now = string.Empty;
    public string totalcustomer = string.Empty;

    public string startdatejs = string.Empty;
    public string enddatejs = string.Empty;

    public string startdate = string.Empty;
    public string enddate = string.Empty;

    protected void Page_Load(object sender, EventArgs e)
    {
        string id = utils.NewRequest("id", utils.RequestType.QueryString);
        Common.Cookie cookie = new Common.Cookie();
        string taobaoNick = cookie.getCookie("nick");
        session = cookie.getCookie("top_sessiongroupbuy");
        string iscrm = cookie.getCookie("iscrm");
        Rijndael_ encode = new Rijndael_("tetesoft");
        nick = encode.Decrypt(taobaoNick);

        startdate = DateTime.Now.AddMonths(-48).ToShortDateString();
        enddate = DateTime.Now.ToShortDateString();

        DateTime start = DateTime.Now.AddMonths(-48);
        DateTime end = DateTime.Now;

        startdatejs = start.Month.ToString() + "/" + start.Day.ToString() + "/" + start.Year.ToString();
        enddatejs = end.Month.ToString() + "/" + end.Day.ToString() + "/" + end.Year.ToString();


        //过期判断
        if (string.IsNullOrEmpty(taobaoNick))
        {
            string msg = "尊敬的淘宝卖家，非常抱歉的告诉您，您还没有购买此服务或者登录信息已失效，如需继续使用请<a href='http://fuwu.taobao.com/serv/detail.htm?service_id=4545' target='_blank'>进入该服务</a>，谢谢！";
            Response.Redirect("buy.aspx?msg=" + HttpUtility.UrlEncode(msg));
            Response.End();
            return;
        }


        //过期判断
        if (!IsBuy(nick))
        {

            string msg = "尊敬的" + nick + "，非常抱歉的告诉您，只有VIP版本才能使用【客户关系营销】功能，如需继续使用请<a href='http://fuwu.taobao.com/ser/detail.htm?service_code=service-0-22904&frm=haoping' target='_blank'>购买高级会员服务</a>，谢谢！";
            Response.Redirect("buy.aspx?msg=" + HttpUtility.UrlEncode(msg));
            Response.End();
            return;
        }
    }

    protected void Button1_Click(object sender, EventArgs e)
    {
        string name = utils.NewRequest("name", utils.RequestType.Form);
        string price = utils.NewRequest("price", utils.RequestType.Form);
        string priceend = utils.NewRequest("priceend", utils.RequestType.Form);
        string countstart = utils.NewRequest("countstart", utils.RequestType.Form);
        string countend = utils.NewRequest("countend", utils.RequestType.Form);
        string actdate = utils.NewRequest("actdate", utils.RequestType.Form);
        string actdateend = utils.NewRequest("actdateend", utils.RequestType.Form);
        string area = utils.NewRequest("area", utils.RequestType.Form);
        string id = Guid.NewGuid().ToString();
        string str = string.Empty;

        string left = string.Empty;
        string right = string.Empty;
        string condition = string.Empty;

        string sql = string.Empty;// "SELECT COUNT(*) FROM TCS_Group WHERE nick = '" + nick + "' AND price = '" + price + "' AND isdel = 0";
        //string count = utils.ExecuteString(sql);
        //if (count != "0")
        //{
        //    Response.Write("<script>alert('该价格的会员组已经存在，请修改价格！');history.go(-1);</script>");
        //    Response.End();
        //    return;
        //}

        left = "guid,name,nick";
        right = "'" + id + "','" + name + "','" + nick + "'";
        if (price.Length != 0)
        {
            left += ",price";
            right += ",'" + price + "'";
            condition += " AND Convert(decimal,a.tradeamount) >= " + price + "";
        }
        if (priceend.Length != 0)
        {
            left += ",priceend";
            right += ",'" + priceend + "'";
            condition += " AND Convert(decimal,a.tradeamount) <= " + priceend + "";
        }
        if (countstart.Length != 0)
        {
            left += ",countstart";
            right += ",'" + countstart + "'";
        }
        if (countend.Length != 0)
        {
            left += ",countend";
            right += ",'" + countend + "'";
        }

        left += ",arealist";
        right += ",'" + area + "'";

        if (area.Length > 0)
        {
            condition += " AND CHARINDEX(REPLACE(a.sheng,'省',''),'" + area + "') > 0";
        }

        if (actdate.Length != 0)
        {
            left += ",actdate";
            right += ",'" + actdate + "'";
            condition += " AND a.lastorderdate >= '" + actdate + "'";
        }
        if (actdateend.Length != 0)
        {
            left += ",actdateend";
            right += ",'" + actdateend + "'";
            condition += " AND a.lastorderdate <= '" + actdateend + "'";
        }

        //同时创建CRM里面的分组
        string appkey = "12159997";
        string secret = "614e40bfdb96e9063031d1a9e56fbed5";

        IDictionary<string, string> param = new Dictionary<string, string>();
        param.Add("group_name", name);

        string result = Post("http://gw.api.taobao.com/router/rest", appkey, secret, "taobao.crm.group.add", session, param);

        string groupid = GetValueByProperty(result, "group_id"); //group_id 
        left += ",taobaoid";
        right += ",'" + groupid + "'";

        sql = "INSERT INTO TCS_Group (" + left + ") VALUES (" + right + ")";
        utils.ExecuteNonQuery(sql);

        string[] areaList = area.Split(',');
        for (int k = 0; k < areaList.Length; k++)
        {
            for (int i = 1; i < 9999; i++)
            {
                //获取买家分组信息
                param = new Dictionary<string, string>();
                param.Add("page_size", "100");
                param.Add("current_page", i.ToString());
                param.Add("relation_source", "1");
                param.Add("order", "lastest_time");
                param.Add("sort", "desc");
                //会员检索条件 min_trade_count
                if (price.Length != 0)
                {
                    param.Add("min_trade_amount", price);
                }
                if (priceend.Length != 0)
                {
                    param.Add("max_trade_amount", priceend);
                }
                if (countstart.Length != 0)
                {
                    param.Add("min_trade_count", countstart);
                }
                if (countend.Length != 0)
                {
                    param.Add("max_trade_count", countend);
                }
                if (area.Length != 0)
                {
                    param.Add("province", areaList[k]);
                }
                if (actdate.Length != 0)
                {
                    param.Add("min_last_trade_time", DateTime.Parse(actdate).ToString("yyyy-MM-dd HH:mm:ss"));
                }
                if (actdateend.Length != 0)
                {
                    param.Add("max_last_trade_time", DateTime.Parse(actdateend).ToString("yyyy-MM-dd HH:mm:ss"));
                }

                result = Post("http://gw.api.taobao.com/router/rest", appkey, secret, "taobao.crm.members.search", session, param);
                Regex reg = new Regex(@"<crm_member>([\s\S]*?)</crm_member>", RegexOptions.IgnoreCase);
                MatchCollection match = reg.Matches(result);
                //Response.Write(result);
                //Response.Write(match.Count.ToString() + "\r\n");

                //如果没有了则退出
                if (match.Count == 0)
                {
                    break;
                }
                //循环更新
                for (int j = 0; j < match.Count; j++)
                {
                    string strCus = match[j].Groups[0].ToString();
                    string buyer_nick = GetValueByProperty(strCus, "buyer_nick");
                    string group_ids = GetValueByProperty(strCus, "group_ids");

                    //更新买家会员分组
                    param = new Dictionary<string, string>();
                    param.Add("buyer_nick", buyer_nick);
                    param.Add("status", "normal");
                    param.Add("group_ids", InitGroupId(group_ids, groupid));

                    result = Post("http://gw.api.taobao.com/router/rest", appkey, secret, "taobao.crm.memberinfo.update", session, param);
                }
            }
        }
        //sql = "SELECT COUNT(*) FROM TCS_Customer WHERE tradeamount = '' AND nick = '" + nick + "'";
        //string count = utils.ExecuteString(sql);
        //if (count != "0")
        //{
        //    //更新价格为空的会员为价格0
        //    sql = "UPDATE TCS_Customer SET tradeamount = '0' WHERE tradeamount = '' AND nick = '" + nick + "'";
        //    utils.ExecuteNonQuery(sql);
        //}

        //condition = @"guid IN (SELECT guid FROM (SELECT * FROM TCS_Customer WHERE nick = '" + nick + "') AS a WHERE 1 = 1 " + condition + ")";

        ////获取符合条件的会员并更新会员分组ID
        //sql = "UPDATE TCS_Customer SET groupguid = '" + id + "' WHERE nick = '" + nick + "' AND " + condition;
        //Response.Write(sql);
        //Response.Write("<br>");
        //utils.ExecuteNonQuery(sql);

        ////获取总数并更新
        //sql = "UPDATE TCS_Group SET count = (SELECT COUNT(*) FROM TCS_Customer WHERE groupguid = '" + id + "') WHERE guid = '" + id + "'";
        //Response.Write(sql);
        //Response.Write("<br>");
        //utils.ExecuteNonQuery(sql);

        Response.Redirect("grouplist.aspx");
    }

    private string InitGroupId(string group_ids, string groupid)
    {
        if (group_ids.IndexOf(groupid) != -1)
        {
            return group_ids;
        }
        else
        {
            return group_ids + "|" + groupid;
        }
    }

    public static string GetValueByProperty(string str, string prop)
    {
        Regex reg = new Regex(@"<" + prop + @">([^<]*)</" + prop + @">", RegexOptions.IgnoreCase);
        if (reg.IsMatch(str))
        {
            return reg.Match(str).Groups[1].ToString();
        }
        else
        {
            return "";
        }
    }

    /// <summary>
    /// 判断该用户是否订购了该服务
    /// </summary>
    /// <param name="nick"></param>
    /// <returns></returns>
    private bool IsBuy(string nick)
    {
        string sql = "SELECT plus FROM TCS_ShopSession WHERE nick = '" + nick + "'";
        DataTable dt = utils.ExecuteDataTable(sql);
        if (dt.Rows.Count != 0)
        {
            string plus = dt.Rows[0][0].ToString();
            if (plus.IndexOf("crm") != -1)
            {
                return true;
            }
            else
            {
                return false;
            }
        }
        else
        {
            return false;
        }
    }



    #region TOP API
    /// <summary> 
    /// 给TOP请求签名 API v2.0 
    /// </summary> 
    /// <param name="parameters">所有字符型的TOP请求参数</param> 
    /// <param name="secret">签名密钥</param> 
    /// <returns>签名</returns> 
    protected static string CreateSign(IDictionary<string, string> parameters, string secret)
    {
        parameters.Remove("sign");
        IDictionary<string, string> sortedParams = new SortedDictionary<string, string>(parameters);
        IEnumerator<KeyValuePair<string, string>> dem = sortedParams.GetEnumerator();
        StringBuilder query = new StringBuilder(secret);
        while (dem.MoveNext())
        {
            string key = dem.Current.Key;
            string value = dem.Current.Value;
            if (!string.IsNullOrEmpty(key) && !string.IsNullOrEmpty(value))
            {
                query.Append(key).Append(value);
            }
        }
        query.Append(secret);
        MD5 md5 = MD5.Create();
        byte[] bytes = md5.ComputeHash(Encoding.UTF8.GetBytes(query.ToString()));
        StringBuilder result = new StringBuilder();
        for (int i = 0; i < bytes.Length; i++)
        {
            string hex = bytes[i].ToString("X");
            if (hex.Length == 1)
            {
                result.Append("0");
            }
            result.Append(hex);
        }
        return result.ToString();
    }
    /// <summary> 
    /// 组装普通文本请求参数。 
    /// </summary> 
    /// <param name="parameters">Key-Value形式请求参数字典</param> 
    /// <returns>URL编码后的请求数据</returns> 
    protected static string PostData(IDictionary<string, string> parameters)
    {
        StringBuilder postData = new StringBuilder();
        bool hasParam = false;
        IEnumerator<KeyValuePair<string, string>> dem = parameters.GetEnumerator();
        while (dem.MoveNext())
        {
            string name = dem.Current.Key;
            string value = dem.Current.Value;
            // 忽略参数名或参数值为空的参数 
            if (!string.IsNullOrEmpty(name) && !string.IsNullOrEmpty(value))
            {
                if (hasParam)
                {
                    postData.Append("&");
                }
                postData.Append(name);
                postData.Append("=");
                postData.Append(Uri.EscapeDataString(value));
                hasParam = true;
            }
        }
        return postData.ToString();
    }
    /// <summary> 
    /// TOP API POST 请求 
    /// </summary> 
    /// <param name="url">请求容器URL</param> 
    /// <param name="appkey">AppKey</param> 
    /// <param name="appSecret">AppSecret</param> 
    /// <param name="method">API接口方法名</param> 
    /// <param name="session">调用私有的sessionkey</param> 
    /// <param name="param">请求参数</param> 
    /// <returns>返回字符串</returns> 
    public static string Post(string url, string appkey, string appSecret, string method, string session,
    IDictionary<string, string> param)
    {
        #region -----API系统参数----
        param.Add("app_key", appkey);
        param.Add("method", method);
        param.Add("session", session);
        param.Add("timestamp", DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss"));
        param.Add("format", "xml");
        param.Add("v", "2.0");
        param.Add("sign_method", "md5");
        param.Add("sign", CreateSign(param, appSecret));
        #endregion
        string result = string.Empty;
        #region ---- 完成 HTTP POST 请求----
        HttpWebRequest req = (HttpWebRequest)WebRequest.Create(url);
        req.Method = "POST";
        req.KeepAlive = true;
        req.Timeout = 300000;
        req.ContentType = "application/x-www-form-urlencoded;charset=gb2312";
        byte[] postData = Encoding.UTF8.GetBytes(PostData(param));
        Stream reqStream = req.GetRequestStream();
        reqStream.Write(postData, 0, postData.Length);
        reqStream.Close();
        HttpWebResponse rsp = (HttpWebResponse)req.GetResponse();
        Encoding encoding = Encoding.GetEncoding(rsp.CharacterSet);
        Stream stream = null;
        StreamReader reader = null;
        stream = rsp.GetResponseStream();
        reader = new StreamReader(stream, encoding);
        result = reader.ReadToEnd();
        if (reader != null) reader.Close();
        if (stream != null) stream.Close();
        if (rsp != null) rsp.Close();
        #endregion
        return Regex.Replace(result, @"[\x00-\x08\x0b-\x0c\x0e-\x1f]", "");
    }
    #endregion
}